home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 49 / Amiga Format CD49 (2000-01-17)(Future Publishing)(GB)(Track 1 of 3)[!][issue 2000-02].iso / -serious- / programming / e / powerd0.06 / modules / libraries / reqtools.m < prev    next >
Text File  |  1999-11-30  |  6KB  |  270 lines
  1. MODULE    'exec/semaphores','utility/tagitem'
  2.  
  3. CONST    REQTOOLSVERSION=38
  4. ENUM    RTPREF_FILEREQ,
  5.         RTPREF_FONTREQ,
  6.         RTPREF_PALETTEREQ,
  7.         RTPREF_SCREENMODEREQ,
  8.         RTPREF_VOLUMEREQ,
  9.         RTPREF_OTHERREQ,
  10.         RTPREF_NR_OF_REQ
  11.  
  12. OBJECT ReqDefaults
  13.     Size:ULONG,
  14.     ReqPos:ULONG,
  15.     LeftOffset:UWORD,
  16.     TopOffset:UWORD,
  17.     MinEntries:UWORD,
  18.     MaxEntries:UWORD
  19.  
  20. OBJECT ReqToolsPrefs
  21.     PrefsSize:ULONG,
  22.     PrefsSemaphore:SS,
  23.     Flags:ULONG,
  24.     ReqDefaults[RTPREF_NR_OF_REQ]:ReqDefaults
  25.  
  26. ->CONST    RTPREFS_SIZE=SIZEOF_ReqToolsPrefs
  27. FLAG    RTPR_DIRSFIRST,
  28.         RTPR_DIRSMIXED,
  29.         RTPR_IMMSORT,
  30.         RTPR_NOSCRTOFRONT,
  31.         RTPR_NOLED,
  32.         RTPR_DEFAULTFONT,
  33.         RTPR_DOWHEEL,
  34.         RTPR_FKEYS,
  35.         RTPR_FANCYWHEEL,
  36.         RTPR_MMBPARENT
  37.  
  38. OBJECT ReqToolsBase
  39.     Lib:LN,
  40.     RTFlags:UBYTE,
  41.     Pad[3]:UBYTE,
  42.     SegList:BPTR,
  43.     IntuitionBase:PTR TO IntuitionBase,
  44.     GfxBase:PTR TO GfxBase,
  45.     DOSBase:PTR TO DOSLibrary,
  46.     GadToolsBase:PTR TO Library,
  47.     UtilityBase:PTR TO Library,
  48.     RealOpenCnt:UWORD,
  49.     AvailFontsLock:UWORD,
  50.     AvailFontsHeader:PTR TO AvailFontsHeader,
  51.     FontsAssignType:ULONG,
  52.     FontsAssignLock:BPTR,
  53.     FontsAssignList:PTR TO AssignList,
  54.     ReqToolsPrefs:PTR TO ReqToolsPrefs,
  55.     prefspad:UWORD
  56.  
  57. ENUM    RT_FILEREQ,
  58.         RT_REQINFO,
  59.         RT_FONTREQ,
  60.         RT_SCREENMODEREQ
  61.  
  62. OBJECT rtFileRequester
  63.     ReqPos:ULONG,
  64.     LeftOffset:UWORD,
  65.     TopOffset:UWORD,
  66.     Flags:ULONG,
  67.     Dir:PTR TO CHAR,
  68.     MatchPat:PTR TO CHAR,
  69.     DefaultFont:PTR TO TextFont,
  70.     WaitPointer:ULONG,
  71.     LockWindow:ULONG,
  72.     ShareIDCMP:ULONG,
  73.     IntuiMsgFunc:PTR TO Hook,
  74.     reserved1:UWORD,
  75.     reserved2:UWORD,
  76.     reserved3:UWORD,
  77.     ReqHeight:UWORD
  78.  
  79. OBJECT rtFileList
  80.     Next:PTR TO rtFileList,
  81.     StrLen:ULONG,
  82.     Name:PTR TO CHAR
  83.  
  84. OBJECT rtVolumeEntry
  85.     Type:ULONG,
  86.     Name:PTR TO CHAR
  87.  
  88. OBJECT rtFontRequester
  89.     ReqPos:ULONG,
  90.     LeftOffset:UWORD,
  91.     TopOffset:UWORD,
  92.     Flags:ULONG,
  93.     Attr:PTR TO TextAttr,
  94.     DefaultFont:PTR TO TextFont,
  95.     WaitPointer:ULONG,
  96.     LockWindow:ULONG,
  97.     ShareIDCMP:ULONG,
  98.     IntuiMsgFunc:PTR TO Hook,
  99.     reserved1:UWORD,
  100.     reserved2:UWORD,
  101.     reserved3:UWORD,
  102.     ReqHeight:UWORD
  103.  
  104. OBJECT rtScreenModeRequester
  105.     ReqPos:ULONG,
  106.     LeftOffset:UWORD,
  107.     TopOffset:UWORD,
  108.     Flags:ULONG,
  109.     private1:ULONG,
  110.     DisplayID:ULONG,
  111.     DisplayWidth:UWORD,
  112.     DisplayHeight:UWORD,
  113.     DefaultFont:PTR TO TextFont,
  114.     WaitPointer:ULONG,
  115.     LockWindow:ULONG,
  116.     ShareIDCMP:ULONG,
  117.     IntuiMsgFunc:PTR TO Hook,
  118.     reserved1:UWORD,
  119.     reserved2:UWORD,
  120.     reserved3:UWORD,
  121.     ReqHeight:UWORD,
  122.     DisplayDepth:UWORD,
  123.     OverscanType:UWORD,
  124.     AutoScroll:ULONG
  125.  
  126. OBJECT rtReqInfo
  127.     ReqPos:ULONG,
  128.     LeftOffset:UWORD,
  129.     TopOffset:UWORD,
  130.     Width:LONG,
  131.     ReqTitle:PTR TO CHAR,
  132.     Flags:LONG,
  133.     DefaultFont:PTR TO TextFont,
  134.     WaitPointer:ULONG,
  135.     LockWindow:ULONG,
  136.     ShareIDCMP:ULONG,
  137.     IntuiMsgFunc:PTR TO Hook
  138.  
  139. OBJECT rtHandlerInfo
  140.     private1:ULONG,
  141.     WaitMask:ULONG,
  142.     DoNotWait:ULONG
  143.  
  144. CONST    CALL_HANDLER=$80000000
  145. ENUM    RT_TagBase=TAG_USER,
  146.         RT_Window,
  147.         RT_IDCMPFlags,
  148.         RT_ReqPos,
  149.         RT_LeftOffset,
  150.         RT_TopOffset,
  151.         RT_PubScrName,
  152.         RT_Screen,
  153.         RT_ReqHandler,
  154.         RT_DefaultFont,
  155.         RT_WaitPointer,
  156.         RT_Underscore,
  157.         RT_ShareIDCMP,
  158.         RT_LockWindow,
  159.         RT_ScreenToFront,
  160.         RT_TextAttr,
  161.         RT_IntuiMsgFunc,
  162.         RT_Locale
  163. ENUM    RTEZ_ReqTitle=RT_TagBase+20,
  164.         RTEZ_Flags,
  165.         RTEZ_DefaultResponse
  166. ENUM    RTGL_Min=RT_TagBase+30,
  167.         RTGL_Max,
  168.         RTGL_Width,
  169.         RTGL_ShowDefault,
  170.         RTGL_GadFmt,
  171.         RTGL_GadFmtArgs,
  172.         RTGL_Invisible,
  173.         RTGL_BackFill,
  174.         RTGL_TextFmt,
  175.         RTGL_TextFmtArgs,
  176.         RTGL_CenterText=RT_TagBase+100,
  177.         RTGL_Flags=RTEZ_Flags
  178. ENUM    RTGS_Width=$80000020,
  179.         RTGS_AllowEmpty=$80000050,
  180.         RTGS_GadFmt=$80000022,
  181.         RTGS_GadFmtArgs=$80000023,
  182.         RTGS_Invisible=$80000024,
  183.         RTGS_BackFill=$80000025,
  184.         RTGS_TextFmt=$80000026,
  185.         RTGS_TextFmtArgs=$80000027,
  186.         RTGS_CenterText=$80000064,
  187.         RTGS_Flags=$80000016
  188. ENUM    RTFI_Flags=$80000028,
  189.         RTFI_Height=$80000029,
  190.         RTFI_OKText=$8000002A,
  191.         RTFI_VolumeRequest=$8000002B,
  192.         RTFI_FilterFunc=$8000002C,
  193.         RTFI_AllowEmpty=$8000002D
  194. ENUM    RTFO_Flags=$80000028,
  195.         RTFO_Height=$80000029,
  196.         RTFO_OKText=$8000002A,
  197.         RTFO_SampleHeight=$8000003C,
  198.         RTFO_MinHeight=$8000003D,
  199.         RTFO_MaxHeight=$8000003E,
  200.         RTFO_FilterFunc=$8000002C
  201. ENUM    RTSC_Flags=$80000028,
  202.         RTSC_Height=$80000029,
  203.         RTSC_OKText=$8000002A,
  204.         RTSC_PropertyFlags=$8000005A,
  205.         RTSC_PropertyMask=$8000005B,
  206.         RTSC_MinWidth=$8000005C,
  207.         RTSC_MaxWidth=$8000005D,
  208.         RTSC_MinHeight=$8000005E,
  209.         RTSC_MaxHeight=$8000005F,
  210.         RTSC_MinDepth=$80000060,
  211.         RTSC_MaxDepth=$80000061,
  212.         RTSC_FilterFunc=$8000002C
  213. ENUM    RTFI_Dir=$80000032,
  214.         RTFI_MatchPat=$80000033,
  215.         RTFI_AddEntry=$80000034,
  216.         RTFI_RemoveEntry=$80000035,
  217.         RTFO_FontName=$8000003F,
  218.         RTFO_FontHeight=$80000040,
  219.         RTFO_FontStyle=$80000041,
  220.         RTFO_FontFlags=$80000042,
  221.         RTSC_ModeFromScreen=$80000050,
  222.         RTSC_DisplayID=$80000051,
  223.         RTSC_DisplayWidth=$80000052,
  224.         RTSC_DisplayHeight=$80000053,
  225.         RTSC_DisplayDepth=$80000054,
  226.         RTSC_OverscanType=$80000055,
  227.         RTSC_AutoScroll=$80000056,
  228.         RTPA_Color=$80000046,
  229.         RTRH_EndRequest=$8000003C,
  230.         REQPOS_POINTER=0,
  231.         REQPOS_CENTERWIN=1,
  232.         REQPOS_CENTERSCR=2,
  233.         REQPOS_TOPLEFTWIN=3,
  234.         REQPOS_TOPLEFTSCR=4,
  235.         REQ_CANCEL=0,
  236.         REQ_OK=1,
  237.         FREQF_NOBUFFER=4,
  238.         FREQF_MULTISELECT=1,
  239.         FREQF_SAVE=2,
  240.         FREQF_NOFILES=8,
  241.         FREQF_PATGAD=16,
  242.         FREQF_SELECTDIRS=$1000,
  243.         FREQF_FIXEDWIDTH=$20,
  244.         FREQF_COLORFONTS=$40,
  245.         FREQF_CHANGEPALETTE=$80,
  246.         FREQF_LEAVEPALETTE=$100,
  247.         FREQF_SCALE=$200,
  248.         FREQF_STYLE=$400,
  249.         SCREQF_SIZEGADS=$2000,
  250.         SCREQF_DEPTHGAD=$4000,
  251.         SCREQF_NONSTDMODES=$8000,
  252.         SCREQF_GUIMODES=$10000,
  253.         SCREQF_AUTOSCROLLGAD=$40000,
  254.         SCREQF_OVERSCANGAD=$80000,
  255.         EZREQF_NORETURNKEY=1,
  256.         EZREQF_LAMIGAQUAL=2,
  257.         EZREQF_CENTERTEXT=4,
  258.         GLREQF_CENTERTEXT=4,
  259.         GLREQF_HIGHLIGHTTEXT=8,
  260.         GSREQF_CENTERTEXT=4,
  261.         GSREQF_HIGHLIGHTTEXT=8,
  262.         VREQF_NOASSIGNS=1,
  263.         VREQF_NODISKS=2,
  264.         VREQF_ALLDISKS=4,
  265.         RTFI_HOOK=12,
  266.         RTFO_HOOK=12,
  267.         REQHOOK_WILDFILE=0,
  268.         REQHOOK_WILDFONT=1,
  269.         FREQF_DOWILDFUNC=$800
  270.